line_element Derived Type

type, public, abstract, extends(element) :: line_element

Defines a line element type.


Contents

Variables

Type-Bound Procedures


Components

Type Visibility Attributes Name Initial
real(kind=real64), public :: area

The element cross-sectional area.
type(material), public :: material

The material.

Type-Bound Procedures

procedure(element_const_matrix_function), public, deferred, pass :: constitutive_matrix

  • pure function element_const_matrix_function(this) result(rst) Prototype

    Defines the signature of a routine for returning a matrix associated with the element.

    Arguments

    Type IntentOptional Attributes Name
    class(element), intent(in) :: this

    The element object.

    Return Value real(kind=real64), allocatable, dimension(:,:)

    The resulting matrix.

procedure(element_shape_function), public, deferred, pass :: evaluate_shape_function

  • pure function element_shape_function(this, i, s) result(rst) Prototype

    Defines the signature of a routine for computing the value of the i-th element shape function at natural coordinate.

    Arguments

    Type IntentOptional Attributes Name
    class(element), intent(in) :: this

    The element object.
    integer(kind=int32), intent(in) :: i

    The index of the shape function to evaluate.
    real(kind=real64), intent(in), dimension(:) :: s

    The value of the natural coordinates at which to evaluate the shape function.

    Return Value real(kind=real64)

    The value of the i-th shape function at s.

procedure, public :: external_force_vector => le_ext_force_vector

  • private pure function le_ext_force_vector(this, q, rule) result(rst)

    Computes the external force vector for the element.

    Arguments

    Type IntentOptional Attributes Name
    class(line_element), intent(in) :: this

    The line_element object.
    real(kind=real64), intent(in), dimension(:) :: q

    The surface traction or body-force vector.
    integer(kind=int32), intent(in), optional :: rule

    The optional numerical integration rule.

    Return Value real(kind=real64), allocatable, dimension(:)

    The resulting vector.

procedure(element_query), public, deferred, pass :: get_dimensionality

  • pure function element_query(this) result(rst) Prototype

    Defines the signature of a function performing a query on an integer-valued property of a element type.

    Arguments

    Type IntentOptional Attributes Name
    class(element), intent(in) :: this

    The element object.

    Return Value integer(kind=int32)

    The resulting value.

procedure(element_query), public, deferred, pass :: get_dof_per_node

  • pure function element_query(this) result(rst) Prototype

    Defines the signature of a function performing a query on an integer-valued property of a element type.

    Arguments

    Type IntentOptional Attributes Name
    class(element), intent(in) :: this

    The element object.

    Return Value integer(kind=int32)

    The resulting value.

procedure(element_get_node), public, deferred, pass :: get_node

  • pure function element_get_node(this, i) result(rst) Prototype

    Defines the signature of a function for retrieving the requested node from the element.

    Arguments

    Type IntentOptional Attributes Name
    class(element), intent(in) :: this

    The element object.
    integer(kind=int32), intent(in) :: i

    The local index of the node to retrieve.

    Return Value type(node)

    The node.

procedure(element_query), public, deferred, pass :: get_node_count

  • pure function element_query(this) result(rst) Prototype

    Defines the signature of a function performing a query on an integer-valued property of a element type.

    Arguments

    Type IntentOptional Attributes Name
    class(element), intent(in) :: this

    The element object.

    Return Value integer(kind=int32)

    The resulting value.

procedure, public :: get_node_natural_coordinates => le_get_node_natural_coordinates

  • private pure function le_get_node_natural_coordinates(this, i) result(rst)

    Returns the natural coordinate of a terminal node.

    Arguments

    Type IntentOptional Attributes Name
    class(line_element), intent(in) :: this

    The line_element object.
    integer(kind=int32), intent(in) :: i

    The local node index.

    Return Value real(kind=real64), allocatable, dimension(:)

    The natural coordinate of the node.

procedure(line_element_get_terminal), public, deferred, pass :: get_terminal_nodes

  • pure subroutine line_element_get_terminal(this, i1, i2) Prototype

    Defines the signature for returning the terminal node numbers.

    Arguments

    Type IntentOptional Attributes Name
    class(line_element), intent(in) :: this

    The line_element object.
    integer(kind=int32), intent(out) :: i1

    The index of the first terminal node.
    integer(kind=int32), intent(out) :: i2

    The index of the second terminal node.

procedure(element_matrix_function), public, deferred, pass :: jacobian

  • pure function element_matrix_function(this, s) result(rst) Prototype

    Defines the signature of a routine for returning a matrix associated with the element.

    Arguments

    Type IntentOptional Attributes Name
    class(element), intent(in) :: this

    The element object.
    real(kind=real64), intent(in), dimension(:) :: s

    The value of the natural coordinates at which the matrix should be evaluated.

    Return Value real(kind=real64), allocatable, dimension(:,:)

    The resulting matrix.

procedure, public :: length => le_length

  • private pure function le_length(this) result(rst)

    Computes the length of the line_element.

    Arguments

    Type IntentOptional Attributes Name
    class(line_element), intent(in) :: this

    The line_element object.

    Return Value real(kind=real64)

    The length of the line element.

procedure, public :: mass_matrix => le_mass_matrix

  • private pure function le_mass_matrix(this, rule) result(rst)

    Computes the mass matrix for the element.

    Arguments

    Type IntentOptional Attributes Name
    class(line_element), intent(in) :: this

    The line_element object.
    integer(kind=int32), intent(in), optional :: rule

    The optional numerical integration rule.

    Return Value real(kind=real64), allocatable, dimension(:,:)

    The resulting matrix.

procedure(line_element_const_matrix_function), public, deferred, pass :: rotation_matrix

  • pure function line_element_const_matrix_function(this) result(rst) Prototype

    Defines the signature for a line-element matrix function.

    Arguments

    Type IntentOptional Attributes Name
    class(line_element), intent(in) :: this

    The line_element object.

    Return Value real(kind=real64), allocatable, dimension(:,:)

    The resulting matrix.

procedure(element_matrix_function), public, deferred, pass :: shape_function_matrix

  • pure function element_matrix_function(this, s) result(rst) Prototype

    Defines the signature of a routine for returning a matrix associated with the element.

    Arguments

    Type IntentOptional Attributes Name
    class(element), intent(in) :: this

    The element object.
    real(kind=real64), intent(in), dimension(:) :: s

    The value of the natural coordinates at which the matrix should be evaluated.

    Return Value real(kind=real64), allocatable, dimension(:,:)

    The resulting matrix.

procedure, public :: stiffness_matrix => le_stiffness_matrix

  • private pure function le_stiffness_matrix(this, rule) result(rst)

    Computes the stiffness matrix for the element.

    Arguments

    Type IntentOptional Attributes Name
    class(line_element), intent(in) :: this

    The line_element object.
    integer(kind=int32), intent(in), optional :: rule

    The optional numerical integration rule.

    Return Value real(kind=real64), allocatable, dimension(:,:)

    The resulting matrix.

procedure, public :: strain => le_strain

  • private pure function le_strain(this, displacement, s) result(rst)

    Computes the line-element strain from global element displacements at the specified natural coordinate.

    Arguments

    Type IntentOptional Attributes Name
    class(line_element), intent(in) :: this

    The line_element object.
    real(kind=real64), intent(in), dimension(:) :: displacement

    The element displacement vector in the global coordinate system.
    real(kind=real64), intent(in), dimension(:) :: s

    The natural coordinates at which to evaluate the strain.

    Return Value real(kind=real64), allocatable, dimension(:)

    The resulting strain vector in the element coordinate system.

procedure(element_matrix_function), public, deferred, pass :: strain_displacement_matrix

  • pure function element_matrix_function(this, s) result(rst) Prototype

    Defines the signature of a routine for returning a matrix associated with the element.

    Arguments

    Type IntentOptional Attributes Name
    class(element), intent(in) :: this

    The element object.
    real(kind=real64), intent(in), dimension(:) :: s

    The value of the natural coordinates at which the matrix should be evaluated.

    Return Value real(kind=real64), allocatable, dimension(:,:)

    The resulting matrix.

procedure, public :: stress => le_stress

  • private pure function le_stress(this, displacement, s) result(rst)

    Computes the line-element stress result from global element displacements at the specified natural coordinate.

    Arguments

    Type IntentOptional Attributes Name
    class(line_element), intent(in) :: this

    The line_element object.
    real(kind=real64), intent(in), dimension(:) :: displacement

    The element displacement vector in the global coordinate system.
    real(kind=real64), intent(in), dimension(:) :: s

    The natural coordinates at which to evaluate the stress.

    Return Value real(kind=real64), allocatable, dimension(:)

    The resulting stress vector in the element coordinate system.